home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / spitfire / chkbat30.zip / CHKUPARJ.ZIP / CHKUP.BAT
DOS Batch File  |  1993-04-04  |  8KB  |  286 lines
  1. @ECHO OFF
  2. REM ╔════════════════════════════════════════════╗
  3. REM ║   This Batch File Created For SFCHKUP By:  ║
  4. REM ║                                            ║
  5. REM ║         Ian Richardson, SysOp              ║
  6. REM ║         The Night Driver BBS               ║
  7. REM ║         DATA: (208) 587-6585               ║
  8. REM ║        VOICE: (208) 587-7553               ║
  9. REM ║                                            ║
  10. REM ║  For Support Of This Batch File, you may   ║
  11. REM ║  call The Night Driver, leave a comment    ║
  12. REM ║  to Ian Richardson on Buffalo Creeks BBS   ║
  13. REM ║  or leave a routed message to node 208000  ║
  14. REM ║  in SpitFire Support Conference on         ║
  15. REM ║  CircuitNET.                               ║
  16. REM ║                                            ║
  17. REM ║  Thanks to Mike Woltz of Buffalo Creek     ║
  18. REM ║  Software for his help in getting the      ║
  19. REM ║  information needed to create this file    ║
  20. REM ║                                            ║
  21. REM ║   Mike Woltz will not support this batch   ║
  22. REM ║   file, only the SFCHKUP program.          ║
  23. REM ║                                            ║
  24. REM ║   The program TIMESTMP is a utility by     ║
  25. REM ║   Ian Richardson and can be found on       ║
  26. REM ║   Buffalo Creek or The Night Driver BBS    ║
  27. REM ║                                            ║
  28. REM ╚════════════════════════════════════════════╝
  29.   C:
  30.   CD \SF\CHKUP1
  31.   MD CHKWORK
  32.   MUV %1%2 C:\SF\CHKUP1\CHKWORK
  33.   CD CHKWORK
  34. REM Check File For Extension and Do Apropriate Action
  35.  
  36. REM Process All Text Type Files
  37.   IF EXIST *.DOC GOTO TXTFILE
  38.   IF EXIST *.BAT GOTO TXTFILE
  39.   IF EXIST *.TXT GOTO TXTFILE
  40.   IF EXIST *.BBS GOTO TXTFILE
  41.   IF EXIST *.CLR GOTO TXTFILE
  42.  
  43. REM Process EXE files to see if they are Self-Extracting Archives
  44.   IF EXIST *.EXE GOTO SELFEXE
  45.  
  46. REM Process COM Files
  47.   IF EXIST *.COM GOTO EXECOM
  48.  
  49. REM Process GIF Files
  50.   IF EXIST *.GIF GOTO GIFFILE
  51.  
  52. REM Transfer command to appropriate ARchive Area
  53.   IF EXIST *.LHA GOTO LZH
  54.   IF EXIST *.LZH GOTO LZH
  55.   IF EXIST *.ZOO GOTO ZOO
  56.   IF EXIST *.ARC GOTO ARC
  57.   IF EXIST *.ARJ GOTO ARJ
  58.   IF EXIST *.ZIP GOTO ZIP
  59.  
  60. REM Make sure all files are processed
  61.   IF EXIST *.* MUV *.* C:\SF\BADCHKUP
  62.   TIMESTMP "%1%2 WAS UPLOADED" C:\SF\WORK\HEYSYSOP.LOG
  63.   GOTO END
  64.  
  65. REM Attempt to Process Self-Extracting Archive
  66. :SELFEXE
  67.  
  68.   REM Attempt ZIP
  69.      PKUNZIP -T %1%2
  70.      IF ERRORLEVEL 1 GOTO EXEARJ
  71.      IF ERRORLEVEL 0 RENAME %1.EXE %1.ZIP
  72.      GOTO ZIP2EXE
  73.  
  74.   REM Attempt ARJ
  75. :EXEARJ
  76.      ARJ t %1%2
  77.      IF ERRORLEVEL 1 GOTO EXEARC
  78.      IF ERRORLEVEL 0 RENAME %1.EXE %1.ARC
  79.      GOTO ARJ2EXE
  80.  
  81.   REM Attempt ARC
  82. :EXEARC
  83.     PKUNPAK -t %1%2
  84.     IF ERRORLEVEL 1 GOTO EXEPAK
  85.     IF ERRORLEVEL 0 RENAME %1.EXE %1.ARC
  86.     GOTO ARC2EXE
  87.  
  88.   REM Attempt PAK
  89. :EXEPAK
  90.     PAK T %1%2
  91.     IF ERRORLEVEL 1 GOTO EXEZOO
  92.     IF ERRORLEVEL 0 RENAME %1.EXE %1.PAK
  93.     GOTO PAK2EXE
  94.  
  95.   REM Attempt ZOO
  96. :EXEZOO
  97.     ZOO -test %1%2
  98.     IF ERRORLEVEL 1 GOTO EXELHA
  99.     IF ERRORLEVEL 0 RENAME %1.EXE %1.ZOO
  100.     GOTO ZOO2EXE
  101.  
  102.   REM Attempt LZH/LHA
  103. :EXELHA
  104.     LHA t %1%2
  105.     IF ERRORLEVEL 1 GOTO EXECOM
  106.     IF ERRORLEVEL 0 RENAME %1.EXE %1.LZH
  107.     GOTO LZH2EXE
  108.  
  109. REM Process LHA & LZH Files
  110. :LZH
  111.   IF EXIST *.LHA RENAME *.LHA *.LZH
  112.   IF EXIST *.LZH C:\UTIL\REARJ *.LZH /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  113.   IF ERRORLEVEL 13 GOTO BADCHK
  114.   IF ERRORLEVEL 7 GOTO BADPACK
  115.   IF ERRORLEVEL 6 GOTO BADCRC
  116.   IF ERRORLEVEL 0 GOTO TEST_OK
  117.  
  118. REM Process ZOO Files
  119. :ZOO
  120.   IF EXIST *.ZOO C:\UTIL\REARJ *.ZOO /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  121.   IF ERRORLEVEL 13 GOTO BADCHK
  122.   IF ERRORLEVEL 7 GOTO BADPACK
  123.   IF ERRORLEVEL 6 GOTO BADCRC
  124.   IF ERRORLEVEL 0 GOTO TEST_OK
  125.  
  126. REM Process PAK Files
  127. :PAK
  128.   IF EXIST *.PAK C:\UTIL\REARJ *.PAK /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  129.   IF ERRORLEVEL 13 GOTO BADCHK
  130.   IF ERRORLEVEL 7 GOTO BADPACK
  131.   IF ERRORLEVEL 6 GOTO BADCRC
  132.   IF ERRORLEVEL 0 GOTO TEST_OK
  133.  
  134. REM Process ARC Files
  135. :ARC
  136.   IF EXIST *.ARC C:\UTIL\REARJ *.ARC /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  137.   IF ERRORLEVEL 13 GOTO BADCHK
  138.   IF ERRORLEVEL 7 GOTO BADPACK
  139.   IF ERRORLEVEL 6 GOTO BADCRC
  140.   IF ERRORLEVEL 0 GOTO TEST_OK
  141.  
  142. REM Process ARJ Files
  143. :ARJ
  144.   IF EXIST *.ARJ C:\UTIL\REARJ *.ARJ /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  145.   IF ERRORLEVEL 13 GOTO BADCHK
  146.   IF ERRORLEVEL 7 GOTO BADPACK
  147.   IF ERRORLEVEL 6 GOTO BADCRC
  148.   IF ERRORLEVEL 0 GOTO TEST_OK
  149.  
  150. REM Process ZIP Files
  151. :ZIP
  152.   IF EXIST *.ZIP C:\UTIL\REARJ *.ZIP /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  153.   IF ERRORLEVEL 13 GOTO BADCHK
  154.   IF ERRORLEVEL 7 GOTO BADPACK
  155.   IF ERRORLEVEL 6 GOTO BADCRC
  156.   IF ERRORLEVEL 0 GOTO TEST_OK
  157.  
  158.  
  159. REM Process LHA & LZH Files
  160. :LZH2EXE
  161.   IF EXIST *.LHA RENAME *.LHA *.LZH
  162.   IF EXIST *.LZH C:\UTIL\REARJ *.LZH /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  163.   IF ERRORLEVEL 13 GOTO BADCHK
  164.   IF ERRORLEVEL 7 GOTO BADPACK
  165.   IF ERRORLEVEL 6 GOTO BADCRC
  166.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  167.  
  168. REM Process ZOO Files
  169. :ZOO2EXE
  170.   IF EXIST *.ZOO C:\UTIL\REARJ *.ZOO /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  171.   IF ERRORLEVEL 13 GOTO BADCHK
  172.   IF ERRORLEVEL 7 GOTO BADPACK
  173.   IF ERRORLEVEL 6 GOTO BADCRC
  174.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  175.  
  176. REM Process PAK Files
  177. :PAK2EXE
  178.   IF EXIST *.PAK C:\UTIL\REARJ *.PAK /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  179.   IF ERRORLEVEL 13 GOTO BADCHK
  180.   IF ERRORLEVEL 7 GOTO BADPACK
  181.   IF ERRORLEVEL 6 GOTO BADCRC
  182.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  183.  
  184. REM Process ARC Files
  185. :ARC2EXE
  186.   IF EXIST *.ARC C:\UTIL\REARJ *.ARC /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  187.   IF ERRORLEVEL 13 GOTO BADCHK
  188.   IF ERRORLEVEL 7 GOTO BADPACK
  189.   IF ERRORLEVEL 6 GOTO BADCRC
  190.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  191.  
  192. REM Process ARJ Files
  193. :ARJ2EXE
  194.   IF EXIST *.ARJ C:\UTIL\REARJ *.ARJ /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  195.   IF ERRORLEVEL 13 GOTO BADCHK
  196.   IF ERRORLEVEL 7 GOTO BADPACK
  197.   IF ERRORLEVEL 6 GOTO BADCRC
  198.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  199.  
  200. REM Process ZIP Files
  201. :ZIP2EXE
  202.   IF EXIST *.ZIP C:\UTIL\REARJ *.ZIP /A* /D /LC:\SF\WORK\HEYSYSOP.LOG /TARJ /U /V
  203.   IF ERRORLEVEL 13 GOTO BADCHK
  204.   IF ERRORLEVEL 7 GOTO BADPACK
  205.   IF ERRORLEVEL 6 GOTO BADCRC
  206.   IF ERRORLEVEL 0 GOTO TEST_OK_EXE
  207.  
  208. REM Process TXT Files Routine
  209. :TXTFILE
  210.   MUV %1%2 C:\SF\CHKUP1
  211.   C:\UTIL\DELXCEPT *.%^
  212.   TIMESTMP "%1%2 Was Uploaded" C:\SF\WORK\HEYSYSOP.LOG
  213.   GOTO END
  214.  
  215. REM Process COM & EXE Files
  216. :EXECOM
  217.   MUV %1%2 C:\SF\BADCHKUP
  218.   C:\UTIL\DELXCEPT *.%^
  219.   TIMESTMP "%1%2 Was Uploaded" C:\SF\WORK\HEYSYSOP.LOG
  220.   GOTO END
  221.  
  222. REM Process GIF Files Routine
  223. :GIFFILE
  224.   C:\UTIL\GIFTEST %1%2 /M:321x201x16
  225.   IF ERRORLEVEL 20 GOTO BADGIFS
  226.   IF ERRORLEVEL 10 GOTO GOODGIFS
  227.   IF ERRORLEVEL 6 GOTO BADGIFS
  228.   IF ERRORLEVEL 0 GOTO GOODGIFS
  229. :BADGIFS
  230.   C:\UTIL\DELXCEPT *.GIF
  231.   MUV *.GIF C:\SF\BADCHKUP
  232.   C:\UTIL\DELXCEPT *.%^
  233.   TIMESTMP "%1%2 Failed Tests" C:\SF\WORK\HEYSYSOP.LOG
  234.   GOTO END
  235. :GOODGIFS
  236.   C:\UTIL\DELXCEPT *.GIF
  237.   MUV %1%2 C:\SF\CHKUP1
  238.   TIMESTMP "%1%2 Passed All Tests" C:\SF\WORK\HEYSYSOP.LOG
  239.   GOTO END
  240.  
  241. REM ZIP Failed Virus Scan Routine
  242. :BADCHK
  243.   IF EXIST %1.* MUV %1.* C:\SF\BADCHKUP
  244.   C:\UTIL\DELXCEPT *.%^
  245.   TIMESTMP "%1%2 Failed Virus Scans" C:\SF\WORK\HEYSYSOP.LOG
  246.   GOTO END
  247.  
  248. REM ZIP Failed CRC Checks
  249. :BADCRC
  250.   IF EXIST %1.* MUV %1.* C:\SF\BADCHKUP
  251.   C:\UTIL\DELXCEPT *.%^
  252.   TIMESTMP "%1%2 Failed CRC Checks" C:\SF\WORK\HEYSYSOP.LOG
  253.   GOTO END
  254.  
  255. REM  Archive Not Able to Be Rearchived
  256. :BADPACK
  257.   IF EXIST %1.* MUV %1.* C:\SF\BADCHKUP
  258.   C:\UTIL\DELXCEPT *.%^
  259.   TIMESTMP "%1%2 Could No Be Re-Archived" C:\SF\WORK\HEYSYSOP.LOG
  260.   GOTO END
  261.  
  262.  
  263. REM ZIP File Is Sound With No CRC Errors & No Viruses
  264. :TEST_OK
  265. REM Place the Board Comment file into the Archive
  266.   IF EXIST %1.ARJ C:\UTIL\ARJ %1 E -ZC:\UTIL\COMMENT.TXT
  267.   C:\UTIL\DELXCEPT *.ARJ
  268.   MUV %1.* C:\SF\CHKUP1
  269.   TIMESTMP "%1%2 Was Uploaded And Passed All Tests" C:\SF\WORK\HEYSYSOP.LOG
  270.   GOTO END
  271.  
  272. :TEST_OK_EXE
  273.   IF EXIST %1.ARJ C:\UTIL\ARJ f -je %1
  274.   IF EXIST %1.EXE C:\UTIL\ARJ %1.EXE E -ZC:\UTIL\COMMENT.TXT
  275.   C:\UTIL\DELXCEPT *.EXE
  276.   MUV %1.* C:\SF\CHKUP1
  277.   TIMESTMP "%1%2 Was Uploaded And Passed All Tests" C:\SF\WORK\HEYSYSOP.LOG
  278.  
  279.  
  280. :END
  281.   CD\SF\CHKUP1\CHKWORK
  282.   C:\UTIL\DELXCEPT *.%^
  283.   CD\SF\CHKUP1
  284.   RD CHKWORK
  285.   CD\SF
  286.